home *** CD-ROM | disk | FTP | other *** search
/ Web Shop Designer 2000 / Web Shop Designer 2000 - Disc 1.iso / WebShop 2000 / data1.cab / Library_Files / Library / Component_Library / Counters / BlueCounter8.boo < prev    next >
Text File  |  2000-02-14  |  753b  |  28 lines
  1. //Blue Counter   8 digits
  2. //Counter.htm
  3.  
  4. #include ..\CompTransStrings.boo
  5.  
  6. ActiveWord = getMainSiteManager().getPhysicalLayout().getActiveWord();
  7. if(ActiveWord <> NULL) then
  8. {
  9.   Component = openComponent();
  10.   WordCounter = Component.getPhysicalLayout().getRootFolder().getResource(0).getWord();
  11.   WordCounter.setSelection(-1, -1);
  12.   Select = WordCounter.getSelectedContext();
  13.   
  14.   ActiveWord.insertContext(Select);
  15.   ActiveWord.update();
  16.   
  17.   WordCounter.deleteContext(Select);
  18.  
  19.   CounterFolder = Component.getPhysicalLayout().getRootFolder().getResource(1);
  20.   
  21.   getMainSiteManager().getPhysicalLayout().getDefaultScriptFolder().insertResource(CounterFolder);  
  22.  
  23.   closeComponent(Component);
  24. }
  25. else
  26. {
  27.   messageBox(message);
  28. }